home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ IE Options 2.xpl < prev    next >
Text File  |  2003-11-20  |  2KB  |  69 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="6"
  3. "COUNT"="3"
  4. "UIPATH 1"="Internet\Internet Explorer\Appearance"
  5. "UIPATH 2"="Internet\Internet Explorer\Address Bar"
  6. "NAME"="AutoComplete Options"
  7. "LANGUAGE"="VBScript"
  8. "VERSION"="1.03"
  9. "TEXT 1"="Use AutoComplete for URLs and paths"
  10. "TEXT 2"="Use AutoComplete for web forms"
  11. "TEXT 3"="Use AutoComplete for passwords in web forms"
  12. "DESCRIPTION 1"="Internet Explorer has a feature called "AutoComplete". If this is activated, IE can automatically remember the entries that were entered in a web form. "
  13. "DESCRIPTION 2"="Although it is a powerful feature, it might lead to security-problems."
  14. "AUTHOR"="Xteq Systems"
  15. "CONTACTURL"="http://www.xteq.com"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 1"=" "
  18. "COMMENT 2"="Thanks to CptSiskoX (CptSiskoX@GeoCities.com) for this plug-in."
  19.  
  20.  
  21.  
  22. sV1="HKCU\Software\Microsoft\windows\CurrentVersion\Explorer\AutoComplete\AutoSuggest"
  23. sV2="HKCU\Software\Microsoft\Internet Explorer\Main\Use FormSuggest"
  24. sV3="HKCU\Software\Microsoft\Internet Explorer\Main\FormSuggest Passwords"
  25. sYES="yes"
  26. sNO="no"
  27.  
  28. 'Called when the Plugin is started
  29. SUB Plugin_Initialize  
  30.   i=RegReadValue(sV1)
  31.   if i=sYES then SetUIElement 1,true
  32.  
  33.   i=RegReadValue(sV2)
  34.   if i=sYES then SetUIElement 2,true
  35.  
  36.   i=RegReadValue(sV3)
  37.   if i=sYES then SetUIElement 3,true
  38. END SUB
  39.  
  40. 'Called when the Plugin should validate the Data the user has entered
  41. SUB Plugin_CheckData(ElementIndex)
  42. END SUB
  43.  
  44.  
  45.  
  46. 'Called when the Plugin should apply the changes
  47. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  48.  Call Wrt(1,sV1)
  49.  Call Wrt(2,sV2)
  50.  Call Wrt(3,sV3)
  51.  Call Restart()
  52. END SUB
  53.  
  54.  
  55. Sub Wrt(ITM,VAL)
  56.  b=GetUIElement(ITM)
  57.  if b=true then
  58.     Call RegWriteValue(VAL,sYES,1)
  59.  else
  60.     Call RegWriteValue(VAL,sNO,1)
  61.  end if
  62. end sub
  63.  
  64.  
  65. 'Called when the Plugin is about to be removed from memory
  66. SUB Plugin_Terminate
  67. END SUB
  68.  
  69.